perm filename XFIB.F4[NEW,LCS] blob sn#330394 filedate 1978-01-22 generic text, type C, neo UTF8
COMMENT āŠ—   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	100	ACCEPT 10,A
C00003 ENDMK
CāŠ—;
100	ACCEPT 10,A
10	FORMAT(F)
	A=FFIB(A)
200	TYPE 10,A
	GO TO 100
	END